(fontset_font_pattern): Remove unused variable `family_registry'.

diff --git a/src/ChangeLog b/src/ChangeLog
index f55149f7bd178f912c278ee97b07e2c5b886bdf5..ed69bfea1aa9375e99adf151d8e388f84dc0a988 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -2,6 +2,9 @@
 
        * fns.c (copy_hash_table): Remove unused variable `v'.
 
+       * fontset.c (fontset_font_pattern): Remove unused variable
+       `family_registry'.
+
 2001-11-05  Richard M. Stallman  <rms@gnu.org>
 
        * m/news-risc.h (BROKEN_PROTOTYPES): Defined.

diff --git a/src/fontset.c b/src/fontset.c
index 647657e389c9bdd4f38f120204cd04f192af4cb0..22f67468b0d75f94b2dafa668465bd09c55a9fe0 100644 (file)
--- a/src/fontset.c
+++ b/src/fontset.c
@@ -534,7 +534,6 @@ fontset_font_pattern (f, id, c)
 {
   Lisp_Object fontset, elt;
   struct font_info *fontp;
-  Lisp_Object family_registry;
   
   elt = Qnil;
   if (fontset_id_valid_p (id))